home *** CD-ROM | disk | FTP | other *** search
/ Aminet 48 / Aminet 48 (2002)(GTI - Schatztruhe)[!][Apr 2002].iso / Aminet / text / edit / vim60rt.lha / Vim / vim60 / syntax / tsalt.vim < prev    next >
Encoding:
Text File  |  2001-05-10  |  8.3 KB  |  215 lines
  1. " Vim syntax file
  2. " Language:    Telix (Modem Comm Program) SALT Script
  3. " Maintainer:    Sean M. McKee <mckee@misslink.net>
  4. " Last Change:    2001 May 09
  5. " Version Info: @(#)tsalt.vim    1.5    97/12/16 08:11:15
  6.  
  7. " For version 5.x: Clear all syntax items
  8. " For version 6.x: Quit when a syntax file was already loaded
  9. if version < 600
  10.   syntax clear
  11. elseif exists("b:current_syntax")
  12.   finish
  13. endif
  14.  
  15. " turn case matching off
  16. syn case ignore
  17.  
  18. "FUNCTIONS
  19. " Character Handling Functions
  20. syn keyword tsaltFunction    IsAscii IsAlNum IsAlpha IsCntrl IsDigit
  21. syn keyword tsaltFunction    IsLower IsUpper ToLower ToUpper
  22.  
  23. " Connect Device Operations
  24. syn keyword tsaltFunction    Carrier cInp_Cnt cGetC cGetCT cPutC cPutN
  25. syn keyword tsaltFunction    cPutS cPutS_TR FlushBuf Get_Baud
  26. syn keyword tsaltFunction    Get_DataB Get_Port Get_StopB Hangup
  27. syn keyword tsaltFunction    KillConnectDevice MakeConnectDevice
  28. syn keyword tsaltFunction    Send_Brk Set_ConnectDevice Set_Port
  29.  
  30. " File Input/Output Operations
  31. syn keyword tsaltFunction    fClearErr fClose fDelete fError fEOF fFlush
  32. syn keyword tsaltFunction    fGetC fGetS FileAttr FileFind FileSize
  33. syn keyword tsaltFunction    FileTime fnStrip fOpen fPutC fPutS fRead
  34. syn keyword tsaltFunction    fRename fSeek fTell fWrite
  35.  
  36. " File Transfers and Logs
  37. syn keyword tsaltFunction    Capture Capture_Stat Printer Receive Send
  38. syn keyword tsaltFunction    Set_DefProt UsageLog Usage_Stat UStamp
  39.  
  40. " Input String Matching
  41. syn keyword tsaltFunction    Track Track_AddChr Track_Free Track_Hit
  42. syn keyword tsaltFunction    WaitFor
  43.  
  44. " Keyboard Operations
  45. syn keyword tsaltFunction    InKey InKeyW KeyGet KeyLoad KeySave KeySet
  46.  
  47. " Miscellaneous Functions
  48. syn keyword tsaltFunction    ChatMode Dos Dial DosFunction ExitTelix
  49. syn keyword tsaltFunction    GetEnv GetFon HelpScreen LoadFon NewDir
  50. syn keyword tsaltFunction    Randon Redial RedirectDOS Run
  51. syn keyword tsaltFunction    Set_Terminal Show_Directory TelixVersion
  52. syn keyword tsaltFunction    Terminal TransTab Update_Term
  53.  
  54. " Script Management
  55. syn keyword tsaltFunction    ArgCount Call CallD CompileScript GetRunPath
  56. syn keyword tsaltFunction    Is_Loaded Load_Scr ScriptVersion
  57. syn keyword tsaltFunction    TelixForWindows Unload_Scr
  58.  
  59. " Sound Functions
  60. syn keyword tsaltFunction    Alarm PlayWave Tone
  61.  
  62. " String Handling
  63. syn keyword tsaltFunction    CopyChrs CopyStr DelChrs GetS GetSXY
  64. syn keyword tsaltFunction    InputBox InsChrs ItoS SetChr StoI StrCat
  65. syn keyword tsaltFunction    StrChr StrCompI StrLen StrLower StrMaxLen
  66. syn keyword tsaltFunction    StrPos StrPosI StrUpper SubChr SubChrs
  67. syn keyword tsaltFunction    SubStr
  68.  
  69. " Time, Date, and Timer Operations
  70. syn keyword tsaltFunction    CurTime Date Delay Delay_Scr Get_OnlineTime
  71. syn keyword tsaltFunction    tDay tHour tMin tMonth tSec tYear Time
  72. syn keyword tsaltFunction    Time_Up Timer_Free Time_Restart
  73. syn keyword tsaltFunction    Time_Start Time_Total
  74.  
  75. " Video Operations
  76. syn keyword tsaltFunction    Box CNewLine Cursor_OnOff Clear_Scr
  77. syn keyword tsaltFunction    GetTermHeight GetTermWidth GetX GetY
  78. syn keyword tsaltFunction    GotoXY MsgBox NewLine PrintC PrintC_Trm
  79. syn keyword tsaltFunction    PrintN PrintN_Trm PrintS PrintS_Trm
  80. syn keyword tsaltFunction    PrintSC PRintSC_Trm
  81. syn keyword tsaltFunction    PStrA PStrAXY Scroll Status_Wind vGetChr
  82. syn keyword tsaltFunction    vGetChrs vGetChrsA  vPutChr vPutChrs
  83. syn keyword tsaltFunction    vPutChrsA vRstrArea vSaveArea
  84.  
  85. " Dynamic Data Exchange (DDE) Operations
  86. syn keyword tsaltFunction    DDEExecute DDEInitate DDEPoke DDERequest
  87. syn keyword tsaltFunction    DDETerminate DDETerminateAll
  88. "END FUNCTIONS
  89.  
  90. "PREDEFINED VARAIABLES
  91. syn keyword tsaltSysVar    _add_lf _alarm_on _answerback_str _asc_rcrtrans
  92. syn keyword tsaltSysVar    _asc_remabort _asc_rlftrans _asc_scpacing
  93. syn keyword tsaltSysVar    _asc_scrtrans _asc_secho _asc_slpacing
  94. syn keyword tsaltSysVar    _asc_spacechr _asc_striph _back_color
  95. syn keyword tsaltSysVar    _capture_fname _connect_str _dest_bs
  96. syn keyword tsaltSysVar    _dial_pause _dial_time _dial_post
  97. syn keyword tsaltSysVar    _dial_pref1 _dial_pref2 _dial_pref3
  98. syn keyword tsaltSysVar    _dial_pref4 _dir_prog _down_dir
  99. syn keyword tsaltSysVar    _entry_bbstype _entry_comment _entry_enum
  100. syn keyword tsaltSysVar    _entry_name _entry_num _entry_logonname
  101. syn keyword tsaltSysVar    _entry_pass _fore_color _image_file
  102. syn keyword tsaltSysVar    _local_echo _mdm_hang_str _mdm_init_str
  103. syn keyword tsaltSysVar    _no_connect1 _no_connect2 _no_connect3
  104. syn keyword tsaltSysVar    _no_connect4 _no_connect5 _redial_stop
  105. syn keyword tsaltSysVar    _scr_chk_key _script_dir _sound_on
  106. syn keyword tsaltSysVar    _strip_high _swap_bs _telix_dir _up_dir
  107. syn keyword tsaltSysVar    _usage_fname _zmodauto _zmod_rcrash
  108. syn keyword tsaltSysVar    _zmod_scrash
  109. "END PREDEFINED VARAIABLES
  110.  
  111. "TYPE
  112. syn keyword tsaltType    str int
  113. "END TYPE
  114.  
  115. "KEYWORDS
  116. syn keyword tsaltStatement    goto break return continue
  117. syn keyword tsaltConditional    if then else
  118. syn keyword tsaltRepeat        while for do
  119. "END KEYWORDS
  120.  
  121. syn keyword tsaltTodo contained    TODO
  122.  
  123. " the rest is pretty close to C -----------------------------------------
  124.  
  125. " String and Character constants
  126. " Highlight special characters (those which have a backslash) differently
  127. syn match tsaltSpecial        contained "\^\d\d\d\|\^."
  128. syn region tsaltString        start=+"+  skip=+\\\\\|\\"+  end=+"+  contains=tsaltSpecial
  129. syn match tsaltCharacter    "'[^\\]'"
  130. syn match tsaltSpecialCharacter    "'\\.'"
  131.  
  132. "catch errors caused by wrong parenthesis
  133. syn region tsaltParen        transparent start='(' end=')' contains=ALLBUT,tsaltParenError,tsaltIncluded,tsaltSpecial,tsaltTodo
  134. syn match tsaltParenError        ")"
  135. syn match tsaltInParen        contained "[{}]"
  136.  
  137. hi link tsaltParenError        tsaltError
  138. hi link tsaltInParen        tsaltError
  139.  
  140. "integer number, or floating point number without a dot and with "f".
  141. syn match  tsaltNumber        "\<\d\+\(u\=l\=\|lu\|f\)\>"
  142. "floating point number, with dot, optional exponent
  143. syn match  tsaltFloat        "\<\d\+\.\d*\(e[-+]\=\d\+\)\=[fl]\=\>"
  144. "floating point number, starting with a dot, optional exponent
  145. syn match  tsaltFloat        "\.\d\+\(e[-+]\=\d\+\)\=[fl]\=\>"
  146. "floating point number, without dot, with exponent
  147. syn match  tsaltFloat        "\<\d\+e[-+]\=\d\+[fl]\=\>"
  148. "hex number
  149. syn match  tsaltNumber        "0x[0-9a-f]\+\(u\=l\=\|lu\)\>"
  150. "syn match  cIdentifier    "\<[a-z_][a-z0-9_]*\>"
  151.  
  152. syn region tsaltComment        start="/\*"  end="\*/" contains=cTodo
  153. syn match  tsaltComment        "//.*" contains=cTodo
  154. syn match  tsaltCommentError    "\*/"
  155.  
  156. syn region tsaltPreCondit    start="^[ \t]*#[ \t]*\(if\>\|ifdef\>\|ifndef\>\|elif\>\|else\>\|endif\>\)"  skip="\\$"  end="$" contains=tsaltComment,tsaltString,tsaltCharacter,tsaltNumber,tsaltCommentError
  157. syn region tsaltIncluded    contained start=+"+  skip=+\\\\\|\\"+  end=+"+
  158. syn match  tsaltIncluded    contained "<[^>]*>"
  159. syn match  tsaltInclude        "^[ \t]*#[ \t]*include\>[ \t]*["<]" contains=tsaltIncluded
  160. "syn match  TelixSalyLineSkip    "\\$"
  161. syn region tsaltDefine        start="^[ \t]*#[ \t]*\(define\>\|undef\>\)" skip="\\$" end="$" contains=ALLBUT,tsaltPreCondit,tsaltIncluded,tsaltInclude,tsaltDefine,tsaltInParen
  162. syn region tsaltPreProc        start="^[ \t]*#[ \t]*\(pragma\>\|line\>\|warning\>\|warn\>\|error\>\)" skip="\\$" end="$" contains=ALLBUT,tsaltPreCondit,tsaltIncluded,tsaltInclude,tsaltDefine,tsaltInParen
  163.  
  164. " Highlight User Labels
  165. syn region tsaltMulti    transparent start='?' end=':' contains=ALLBUT,tsaltIncluded,tsaltSpecial,tsaltTodo
  166.  
  167. syn sync ccomment tsaltComment
  168.  
  169.  
  170. " Define the default highlighting.
  171. " For version 5.7 and earlier: only when not done already
  172. " For version 5.8 and later: only when an item doesn't have highlighting yet
  173. if version >= 508 || !exists("did_tsalt_syntax_inits")
  174.   if version < 508
  175.     let did_tsalt_syntax_inits = 1
  176.     command -nargs=+ HiLink hi link <args>
  177.   else
  178.     command -nargs=+ HiLink hi def link <args>
  179.   endif
  180.  
  181.     HiLink tsaltFunction        Statement
  182.     HiLink tsaltSysVar        Type
  183.     "HiLink tsaltLibFunc        UserDefFunc
  184.     "HiLink tsaltConstants        Type
  185.     "HiLink tsaltFuncArg        Type
  186.     "HiLink tsaltOperator        Operator
  187.     "HiLink tsaltLabel        Label
  188.     "HiLink tsaltUserLabel        Label
  189.     HiLink tsaltConditional        Conditional
  190.     HiLink tsaltRepeat        Repeat
  191.     HiLink tsaltCharacter        SpecialChar
  192.     HiLink tsaltSpecialCharacter    SpecialChar
  193.     HiLink tsaltNumber        Number
  194.     HiLink tsaltFloat        Float
  195.     HiLink tsaltCommentError    tsaltError
  196.     HiLink tsaltInclude        Include
  197.     HiLink tsaltPreProc        PreProc
  198.     HiLink tsaltDefine        Macro
  199.     HiLink tsaltIncluded        tsaltString
  200.     HiLink tsaltError        Error
  201.     HiLink tsaltStatement        Statement
  202.     HiLink tsaltPreCondit        PreCondit
  203.     HiLink tsaltType        Type
  204.     HiLink tsaltString        String
  205.     HiLink tsaltComment        Comment
  206.     HiLink tsaltSpecial        Special
  207.     HiLink tsaltTodo        Todo
  208.  
  209.   delcommand HiLink
  210. endif
  211.  
  212. let b:current_syntax = "tsalt"
  213.  
  214. " vim: ts=8
  215.